0 REM"NUMBER DEFENDER-(C)1989 NAT FUN SERVICES
1 [151]49152,RT:[156]:RT[178][194](49152):[141]2:SP(1)[178]1.5:SP(2)[178]1:SP(3)[178].5:BV[178]0:[137]6
2 [151]53281,1:[151]53280,1:[129]C[178]1[164]50:[130]:BM(1)[178]10:BM(2)[178]20:BM(3)[178]30
3 [151]53281,15:[151]53280,15:[129]C[178]1[164]50:[130]:T[178]0:[129]I[178]3[164]35[169]4:BP(T)[178]I:T[178]T[170]1
4 [130]:[151]53281,12:[151]53280,12:[129]C[178]1[164]50:[130]:[151]53281,11:[151]53280,11
5 [129]C[178]1[164]50:[130]:BM$[178]"ONON  CMDCMD  CMDCMD*RNDCMDCMDCONTINTABSCMDCMDWAITLOGCOS":[142]
6 [151]53281,0:[151]53280,0:VS$(1)[178]"":VS$(2)[178]"":VS$(3)[178]""
7 CL(1,1)[178]15:CL(1,2)[178]12:CL(1,3)[178]11:CL(2,1)[178]3:CL(2,2)[178]14:CL(2,3)[178]6
8 CL(3,1)[178]7:CL(3,2)[178]8:CL(3,3)[178]2
9 SH$[178]"CMD CMD ON SYSTOFORTO  CMD CMDCMDCMDCMDCMDCOSSYS FOR VERIFYLOG"
10 S[178]54272:[141]59999:[151]S[170]4,129
11 [151]53280,0:[151]53281,0:[153]"LOAD     OPENTOCONTTOTOCMDCMDCMDOPENLENCONTSTR$(null)"
15 [153][166]9)"ONOPENATN(null)STR$ (null)ATHAN CHR$RAINGER (null)(null)VAL(null)VAL(null)(null)"
20 [153][166]5)"  TAB(TAB(TAB(WAITRNDFN   FNLOGWAIT* FN   WAITRNDFN   FN   WAITRND"
25 [153][166]5)"FOR  WAITLOG  FN   FN LOGCOS  FN   FN FN FN "
30 [153][166]5)"SYS    FN   FN FN FN FN   WAITCOSFN   FN   *":LV[178]1
35 [153][166]5)"    FN   FN FN FN FN   FN FN WAITLOG WAITRND"
40 [153][166]5)"    WAITLOG   *FN FN FN   *FN   FN FN "
45 [153][166]2)"    LOG    FN   FN   FN  LOGFN   LOGFN   FN   WAITRND"
50 [153][166]2)"FOR  RND WAITFN  FN FN FN FN   SGN FN FN "
55 [153][166]2)"SYS   WAITINT    FN  FN   FN FN FN FN   FN   WAITCOS"
60 [153][166]2)"  COS WAITFN  FN FN FN FN   FN FN RND WAITRND"
65 [153][166]2)"    *    FN FN   FN FN   *FN   FN FN "
68 [151]646,[187](0)[172]16:[153]"       (null)RITTEN BY (null)ATHAN CHR$RAINGER"
70 [153][166]4)"WAITLIST- (null)RESS THE SPACE BAR TO START -":[151]198,0
75 C1(0)[178]6:C1(1)[178]14:C1(2)[178]3:C1(3)[178]1:C1(4)[178]3:C1(5)[178]14
80 C2(0)[178]11:C2(1)[178]12:C2(2)[178]15:C2(3)[178]1:C2(4)[178]15:C2(5)[178]12:Q[178]0
82 C3(0)[178]7:C3(1)[178]7:C3(2)[178]7:C3(3)[178]8:C3(4)[178]8:C3(5)[178]8
85 [151]646,C1(Q):[153]""[166]9)"ATN(null)STR$ (null)ATHAN CHR$RAINGER (null)(null)VAL(null)VAL(null)(null)":[151]646,C2(Q)
87 [153]"    - (null)RESS THE SPACE BAR TO START -"
88 [151]646,[187](0)[172]16
89 [153]"       (null)RITTEN BY (null)ATHAN CHR$RAINGER"
91 [151]646,C3(Q)
92 [153]"(null)N THE SCREEN ARE SHOWN SEVERAL PILLARS,";
93 [153]" NUMBERED 1 TO 9...YOU MUST DEFEND EACH"
94 [153]"   PILLAR WHEN A BOMB FALLS DOWN BY"
95 [153]" PRESSING THE APPROPRIATE KEY (1-9) OF"
96 [153]"   THE PILLAR THAT YOU WISH TO DEFEND."
97 Q[178]Q[170]1:[139]Q[178]6[167]Q[178]0
98 [161]A$:[139]A$[179][177]" "[167][137]85
99 [137]1000
100 [153]"LOAD":[129]C[178]1[164]1000:[130]:[151]S[170]4,129
101 [129]I[178]0[164]3:[151]646,C2(I):[153]""[166]15)"CHR$ET READY!"
102 [153]""[166]14)"ASCOR (null)EVEL"LV"CMD!"
103 [153]"  (null)OU MUST STOP"BM(LV)"BOMBS ON THIS LEVEL":[129]C[178]1[164]100:[130]:[130]
104 [140]:[129]I[178]0[164]6:[135]ND:[151]S[170]1,125:[129]C[178]1[164]50:[130]
105 [151]S[170]1,0:[129]C[178]1[164]ND:[130]:[130]
106 [129]I[178]3[164]0[169][171]1:[151]646,C2(I):[153]""[166]15)"CHR$ET READY!"
107 [153]""[166]14)"ASCOR (null)EVEL"LV"CMD!"
108 [153]"  (null)OU MUST STOP"BM(LV)"BOMBS ON THIS LEVEL"
109 [129]C[178]1[164]100:[130]:[130]:[153]"LOAD":[129]C[178]1[164]1000:[130]:[142]
1000 [141]100:[151]53265,0
1005 [151]53280,0:[151]53281,0:[153]"LOAD":BM[178]BM(LV):HS[178]4
1010 [141]2000
1011 [141]1100:[141]59999:[151]S[170]4,129
1013 [129]C[178]1[164]3000:[130]
1015 [153]"";
1016 [151]646,CL(LV,2)
1017 [153]" (null)CORE"SC"CMD     ":[153],[166]3)"ON   (null)EVEL"LV"CMD   "
1018 [153],,[166]3)"ON   PEEKOMBS LEFT"BM(LV)"CMD ON"
1020 [153]VS$(LV)[166]BP(HS)[171]1)SH$
1025 [139]BS[177]0[167][137]1058
1030 RN[178][181]([187](0)[172]9):RB[178]BP(RN):BS[178]1:BV[178]1:BM(LV)[178]BM(LV)[171]1
1032 [153]""[166]RB)BM$
1035 [139]BM(LV)[178][171]1[167][137]1050
1040 [137]1058
1050 [153]VS$(LV)"                                        "
1051 [153]VS$(LV)"                                        "
1052 [153]VS$(LV)[166]BP(HS)):[129]I[178]0[164]2
1053 [151]S[170]4,17:[129]I[178]0[164]35:[153]VS$(LV)[166]I)SH$:[151]S[170]1,I[172]7:[130]
1054 [129]I[178]35[164]0[169][171]1:[153]VS$(LV)[166]I)SH$:[151]S[170]1,I[172]7:[130]:[151]S[170]1,0
1055 [153]"LOAD"[166]15)"(null)ELL DONE!":[139]LV[178]3[167][137]1057
1056 [153][166]9)"(null)ROCEED TO NEXT LEVEL!"
1057 SC[178]SC[170](250[172]LV):LV[178]LV[170]1:[137]1092
1058 [161]A$:[139]A$[179]"1"[176]A$[177]"9"[167][137]1070
1060 [139]HS[179][177][197](A$)[171]1[167]HS[178][197](A$)[171]1:[137]1062
1061 [137]1070
1062 [153]VS$(LV)"                                        "
1063 [153]VS$(LV)"                                        "
1064 [153]VS$(LV)[166]BP(HS)):[137]1070
1070 BV[178]BV[170]SP(LV):[139]BV[177][178]21[171](6[170](3[172]LV))[167][137]1078
1071 [153]"";:[129]I[178]1[164]BV:[153]:[130]:[153][166]RB)BM$
1072 [139]BV[178]19[171](6[170](3[172]LV))[167][137]1084
1073 [137]1015
1078 [151]S[170]4,129:[129]Q[178]0[164]2:[129]T[178]0[164]30[169]4:[151]S[170]1,T:[130]:[141]2:[130]
1079 [129]T[178]0[164]2:[129]I[178]45[164]0[169][171]5:[151]S[170]1,I:[151]53281,1:[151]53281,0:[130]:[130]
1080 [151]53280,6:[153]"LOADSYS(null)OOOH (null)O! (null)OU LET ONE OF THE"
1081 [153]"FORBOMBS FLY INTO A TOWER...!"
1082 [137]3000
1083 [139]HS[178]RN[167][137]1090
1084 [139]HS[178]RN[167][137]1089
1085 [137]1015
1089 [153]"";:[129]I[178]1[164]BV:[153]:[130]:[153][166]BP(RN))"  CMDCMD  CMDCMD  "
1090 [151]S[170]4,129:[129]I[178]20[164]0[169][171]1:[151]S[170]1,I:[130]:[129]I[178]0[164]20[169]2:[151]S[170]1,I:[130]
1091 [151]S[170]1,0:BS[178]0:SC[178]SC[170]25:[137]1015
1092 [153]"(null)EVEL COMPLETION BONUS IS"250[172](LV[171]1)"CMDPTS":[129]C[178]1[164]5000:[130]
1093 [139]LV[179]4[167][137]1000
1094 [141]4000:[153]"SYSLENONGRATULATIONS YOU HAVE DEFEATED "
1095 [153][166]13)"THE ALIENS!!!!!":[153]"CLR(null)OUR FINAL SCORE IS"SC"CMD!!!"
1097 [153]"OPEN(null)RESS (null)VAL(null)(null)(null)(null) TO CONTINUE"
1098 [161]A$:[139]A$[179][177][199](13)[167]1098
1099 [137]1
1100 [153]"";
1105 [129]I[178]1[164]22[171](6[170](3[172]LV)):[153]:[130]
1110 [153]" 1 2 3 4 5 6 7 8 9"
1112 [151]646,CL(LV,1):[153]"FNTHENFNTHENFNTHENFNTHENFNTHENFNTHENFNTHENFNTHENFNTHEN"
1114 [153]"INTABSINTABSINTABSINTABSINTABSINTABSINTABSINTABSINTABS"
1115 [151]646,CL(LV,2):[129]I[178]1[164]LV[172]3
1116 [153]"GETWAITGETGETWAITGETGETWAITGETGETWAITGETGETWAITGETGETWAITGETGETWAITGETGETWAITGETGETWAITGET"
1117 [130]
1118 [151]646,CL(LV,3):[153]"INTABSINTABSINTABSINTABSINTABSINTABSINTABSINTABSINTABS"
1120 [153]"FNTHENFNTHENFNTHENFNTHENFNTHENFNTHENFNTHENFNTHENFNTHEN"
1122 [153]"                  "
1123 SV[178]19[171](6[170](3[172]LV))
1125 [151]53265,27:[142]
2000 [151]646,CL(LV,1)
2005 [153]"TOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTO";
2008 [151]646,CL(LV,2)
2010 [153]" (null)CORE"SC"CMD     ":[153],[166]3)"ON   (null)EVEL"LV"CMD    "
2015 [153],,[166]3)"ON   PEEKOMBS LEFT"BM(LV)"CMD ON":BM[178]BM(LV):[141]59999
2020 [129]I[178]1984[164]2023:[151]I,227:[130]:[129]I[178]56256[164]56295:[151]I,CL(LV,3):[130]:[142]
3000 [153]"CLR(null)OU ATTAINED A SCORE OF"SC"POINTS!"
3002 [153]"             - CHR$ATN(null)VAL (null)(null)VAL(null)! -"
3005 [153]"OPEN(null)RESS (null)VAL(null)(null)(null)(null) TO CONTINUE"
3006 [153]"TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB("
3008 [151]S[170]4,129:Y[178]5
3009 [151]S[170]1,Y:Y[178]Y[171]1:[139]Y[178]0[167]Y[178]5
3010 [161]A$:[139]A$[179][177][199](13)[167]3009
3011 [139]RT[178]0[167]RT[178]1:[137]3015
3012 [137]1
3015 [153]"LOAD (null)NFORTUNATELY,THERE ARE NO SECOND        CHANCES IN THIS GAME..."
3016 [129]I[178]15[164]0[169][171].1:[151]S[170]24,I:[130]:[129]C[178]1[164]3000:[130]
3017 [151]53270,193:[151]0,0:[129]C[178]1[164]1000:[130]:[151]0,47:[129]C[178]1[164]1500:[130]
3019 [151]53270,200
3020 [153]"LOADCONT"[199](142):[151]53280,14:[151]53281,6
3025 [153]"    **** COMMODORE 64 BASIC V2 ****"
3030 [153]" 64K RAM SYSTEM  38911 BASIC BYTES FREE"
3040 [153]"READY."
3045 [129]T[178]0[164]4:[153]" ":[129]C[178]1[164]350:[130]:[153]"WAIT "
3046 [129]C[178]1[164]250:[130]:[130]
3048 [129]T[178]0[164]15:[135]A$:[153]""[166]T)A$" ":[129]C[178]1[164]75:[130]:[130]
3049 [129]T[178]0[164]1:[153]""[166]16)" ":[129]C[178]1[164]250:[130]:[153]"";
3050 [153][166]16)"WAIT ":[129]C[178]1[164]350:[130]:[130]:[137]1
4000 [151]S[170]4,21
4001 [129]I[178]1[164]155:[129]T[178]0[164]255[169]I
4002 [151]S[170]1,T:[151]S[170]15,I:[130]:[130]:[151]S[170]1,0:[151]S[170]15,0
4003 [151]S[170]4,129:[129]I[178]0[164]10[169].5:[151]S[170]1,I:[130]:[129]I[178]10[164]2[169][171]1:[151]S[170]1,I:[130]
4004 [129]C[178]1[164]500:[130]:[129]I[178]15[164]0[169][171].1:[151]S[170]24,I:[130]:[151]S[170]1,0:[142]
59999 [129]I[178]S[164]S[170]24:[151]I,0:[130]:[151]S[170]24,15:[151]S[170]5,255:[151]S[170]6,255:[142]
60000 [131]250,100,100,225,550,300,75
60001 [131]O,R," ",A,R,E," ",T,H,E,R,E,.,.,.,?